system("pm_init","fan");
intmat m[3][3]= 3,1,0,
                0,1,0,
                0,1,2;
system("make_cone_from_rays",m);
system("get_facets_from_cone");

